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An input processor 
that handles 
simple F-conversions 

Let’s create a dictionary-driven input processor 
that allows us to capture input the same way the LIST 
verb allows us to generate output. A command like 
INPUTINVOICE SUBTOTAL TAX will mean “create or 
change items in the INVOICE file by prompting for the 
SUBTOTAL and TAX attributes”. SUBTOTAL and TAX 
will be standard attribute definition items in the 
dictionary of the INVOICE file. 

The'easiest way to make our INPUT program 
process a command line is to use a proc and a 
PROCREAD. For example, the proc 

PQ 

HRUN BP INPUT 
P 

will invoke our program with the command line saved 
in the proc input buffer. Then we can use the BASIC 
statement 

PROCREAD SENTENCE 

ELSE STOP "Use the INPUT command!" 


to pick up the command line, and the statements 

FILE = FIELD (SENTENCE, " ", 2) 

OPEN FILE TO FDATA 

ELSE STOP "Use INPUT <file>. . 

» 

to extract the file name from the command line and 
open the file for editing. 

How does the INPUT program know what data 
items to edit? A fancy version of INPUT might 
automatically extract quoted item identifiers out of the 
command line. This version will simply prompt for 
identifiers and read items using the code 

get.id: PRINT ; PRINT "Edit what id": 
INPUT ID 

IF ID = "" THEN STOP 

READ ITEM FROM FDATA, ID ELSE ITEM = "" 
GOTO get. id 

Once we have an item, we want to edit the 
attributes mentioned in the command line. The loop 

WORD = 3 
LOOP 

DICTID = FIELD(SENTENCE, " ", WORD) 
UNTIL DICTID = "" DO 
WORD = WORD+1 
REPEAT 


will pick each dictionary word out of the command. 
Once we have the name of a dictionary item in DICTID, 
we can extract the attribute number, output heading, and 
conversion code from the dictionary definition item 
with the code 

OPEN "DICT", FILE TO FDICT 
ELSE STOP "No DICT!" 

READ DITEM FROM FDICT, DICTID THEN 
AMC = DITEM<2> 

TITLE = DITEM<3> 

CONV = DITEM<7> 

END ELSE STOP DICTID:" not in diet!" 

For each attribute in ITEM that needs editing, we 
can convert and display the old attribute value, then 
prompt for a new value. The statements 

OLD = ITEM<AMC> 

IF CONV # "" THEN OLD = OCONV(OLD, CONV) 
PRINT "Old " : TITLE: " = " : OLD 
PRINT "New ":TITLE: ; INPUT NEW 
IF NEW # "" THEN 

IF NEW = "\" THEN NEW = "" 

ITEM<AMC>= ICONV(NEW, CONV) 

END 

accomplish that. A carriage return with no new data 
leaves an attribute unchanged, and a backslash clears an 
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attribute to null. All that’s left to do is give the user the 
option to file or exit, by using 

LOOP 

PRINT "File or EXit": ; INPUT COMMAND 
UNTIL COMMAND="FI" OR COMMAND="EX" DO 
REPEAT 
PRINT ID: 

IF COMMAND = "EX" THEN 
PRINT " exited." 

END ELSE 

WRITE ITEM ON FDATA, ID 
PRINT " filed." 

END 

Putting all of the above together in one program 

yields 

INPUT 

001 PROCREAD SENTENCE ELSE 

STOP "Use the INPUT command!" 

002 FILE = FIELD (SENTENCE, " ", 2) 


003 OPEN FILE TO FDATA ELSE 

STOP "Use INPUT <file>. . ." 

004 OPEN ”DICT", FILE TO FDICT ELSE 
STOP "No DICT!" 

005 get.id: PRINT ; PRINT 

"Edit what id": ; INPUT ID 
006 IF ID = "" THEN STOP 
007 READ ITEM FROM FDATA, ID ELSE 
ITEM = "" 

008 WORD = 3 
009 LOOP 

010 DICTID=FIELD(SENTENCE, " ", WORD) 
Oil UNTIL DICTID = "" DO 
012 READ DITEM FROM FDICT, DICTID THEN 
013 AMC = DITEM<2> 

014 TITLE = DITEM<3> 

015 CONV = DITEM<7> 

016 OLD = ITEM<AMC> 

017 IF CONV # THEN 

OLD = OCONV(OLD, CONV) 

018 PRINT "Old ":TITLE:" = ":OLD 
019 PRINT "New ": TITLE: ,- INPUT NEW 


020 IF NEW # "" THEN 

021 IF NEW = "\" THEN NEW = "" 

022 ITEM<AMC> = ICONV(NEW, CONV) 

023 END 

024 END ELSE STOP 

DICTID: " is not in " :FILE: "' s diet! " 
025 WORD = WORD+1 
026 REPEAT 

027 IF WORD = 3 THEN 

STOP "Use INPUT <file> <atr>. . ." 

028 LOOP 

029 PRINT. "FI or EX": ; INPUT C14D 
030 UNTIL 

(CMD="FI") OR (CMD="EX") DO REPEAT 
031 PRINT ID: 

032 IF CMD = "EX" THEN 

PRINT ” exited. " ELSE 
033 WRITE ITEM ON FDATA, ID 
034 PRINT " filed." 

035 END 
036 GOTO get. id 
037 END 


B-trees for P!ck systems. 


Tirel®Twaiting for your computer to SORT or SELECT your large data 
files? Need to quickly find any attribute? Want to scroll files up or down, in 
any sort order? With B-TREE-P you can instantly search, sort, and scroll any 
data from any file! 

Now you can instantly look up customers by name, street. Zip code, or 
any other field — not just by customer number. Now you can immediately 
find inventory entries by quantity, cost, or description — not just by part 
number. Whatever files you use, now you can instantly locate and display 
your data any way you want, without having to wait for endless SORTs and 
SELECTS. 

Immediately display any record in any file just by typing one or more 
starting characters that match any field in the record. You can display not 
only a selected record, but also any previous and next records, using any 
sort order you specify. You can jump to any record in a file at any time, 
then browse through the file by scrolling up or down, a record at a time or a 
page at a time, in any sort order. 

As one of Semaphore's programmers says: “We often ask ourselves 
why we waited so long to create B-TREE-P. After using it for our own 
production work, we wonder how we ever got by before without it. A Pick 
computer without B-TREE-P is like a car without wheels". 

B-TREE-P is a proven collection of BASIC subprograms for using B-trees 
on your computer system. B-trees allow any of the data in any of your files 
to be instantly located and displayed in any sort order, without having to 
wait for SORT or SELECT commands. 

B-TREE-P and a few optional minor modifications to your existing data 
entry programs are all that is necessary for you to immediately be able to 
search, browse, display, or print your data quickly and conveniently. 
Modifications to your existing data files are absolutely unnecessary! 

Here are a few of the ways our customers have put B-TREE-P to work: 

• Within minutes of loading the B-TREE-P source code, one of our first 
customers began using B-TREE-P's standard “browser" for searching a 
120,000+ record customer master file. Any name, company, or address can 
immediately be located and displayed, just by typing one or more 
characters that match the field. No more waiting for SELECTs! 

• Another customer has set up B-TREE-P for purchase order inquiries. A 
file of multivalued line items and submultivalued delivery dates and 
quantities can instantly be viewed by item or by date. Pages can be 
scrolled at the terminal, forward or backward. Any range of data can be 


^feantly printed. No more waiting for SORTs! 

• A California county jail uses B-TREE-P for inmate cash accounting. 
Although cash records are filed by inmate booking numbers, B-TREE-P allows 
a list alphabetized by the name attribute to be displayed at all times, even 
as records are created and deleted at other terminals. Any inmate record 
(or nearest match) can be immediately found and displayed just by typing 
one or more characters in a name. 

• A manufacturer uses B-TREE-P to let marketing personnel instantly 
display sales orders six different ways: by part, by description, by ship date, 
by sales rep, by customer name, and by sales territory. With just a few 
keystrokes, operators can instantly display records under a new sort (subsorts 
too) or find and output a given item. 

B-TREE-P includes all necessary BASIC source code for a B-tree system 
that works with any file. Included are an insertion subroutine, deletion 
subroutine, lookup subroutine, previous/next subroutine, and complete 
instructions. Plus, you receive the source code for a complete 
demonstration system that uses B-TREE-P to maintain a name and address 
file, including an editor program for creating and changing name and 
address records, a browser program for displaying records, and a printer 
program for listing file items in order without having to wait for a sort. 


To order, send your name, address, telephone 
number, and your check for $395 (plus tax in 
California) payable to Semaphore Corp. at 
207 Granada Drive, Aptos, CA 95003. Or call 
us at (408) 688-9200 for more information or to 
place a COD order. We'll send you complete 
B-TREE-P source code and all necessary 
documentation, along with all back issues of 
our special B-tree newsletter. 


B-TREE-P includes a license agreeement limiting your use of B-TREE-P to one computer at a time. Multi-CPU 
and OEM resale agreements are also available. Pick is a trademark of Pick Systems. 
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If the dictionary of the INVOICE file contains the 
definitions 

SUBTOTAL TAX 

001 S 001 S 

002 1 002 2 

003 SUBTOTAL 003 TAX 

007 MD2 007 MD2 

009 L 009 L 

010 10 010 10 

then the command 

INPUT INVOICE SUBTOTAL TAX 

will cause a dialog like 

Edit what id?l 
Old SUBTOTAL = 4.00 
New SUBTOTAL? 6 
Old TAX = 2.00 
New TAX?1 
File Sr EXit?FI 
1 filed. 

In the above example, the INPUT program 
automatically uses the SUBTOTAL and TAX dictionary 
definitions to figure out that the new subtotal should go 
in attribute 1 and the new tax in attribute 2, both with 
MD2 conversions. 


Although the INPUT program provides a very 
convenient form of editing items, it performs practically 
no error checking. Although line 27 makes sure at least 
one dictionary item is named on the command line, that 
check is only made after the user inputs an item 
identifier, and no validation of the dictionary item itself 
is performed. What if the dictionary item has no valid 
attribute number? What if the conversion code can’t be 
performed by BASIC? For example, if the INVOICE 
dictionary contains 

REMIT 
001 S 
002 3 
003 TOTAL 
007 F; 1;2; + ; (MD2) 

009 L 
010 10 

then what happens when the command 

INPUT INVOICE SUBTOTAL TAX REMIT 

is given? INPUT should detect and compute the 
F-conversion, which means calculating the sum of 
attributes 1 and 2, and displaying the result with an MD2 
conversion. Detecting the F-conversion can be done by 
inserting 

IF CONV[l,2] = "F;" THEN 
GOSUB show, func ELSE 


after line 15 above, and inserting 

END 

after line 23. That leaves the job of computing the 
F-conversion to a show.f unc subroutine, which should 
begin by preparing to scan the F-conversion at column 3 
(after “F ; ”) and clearing out a STACK variable. For 
example, 

show.func: COL=3; STACK=""; STACKED=0 
LOOP 

GOSUB get. operand 
UNTIL OPERAND = "" DO 
BEGIN CASE 
CASE OPERAND = "+" 

STACK<STACKED-1> = 

STACK<STACKED-1> + STACK<STACKED> 
STACKED = STACKED-1 
CASE OPERAND = "*" 

STACK<STACKED-1> = 

STACK<STACKED-1>* STACK<STACKED> 
STACKED = STACKED-1 
CASE OPERAND MATCHES "ON" 

STACKED = STACKED+1 
STACK<STACKED>= ITEM<OPERAND> 

CASE 1 ;* Assume a conversion code 
STACK<STACKED> = 

OCONV(STACK<STACKED>,OPERAND) 

END CASE 
REPEAT 






Software that lets your Zebra computer be the hub of a Macintosh network. 


Telefolders is software from Semaphore Corporation that lets your Macs logon 
to your Zebra over a direct serial connection or by modem. You can plug in as 
many Macs as you have Zebra ports available. All Macs can be 
simultaneously uploading and downloading files to and from the Zebra. 


|fg^| It's time to coll Telefolders™ 

Enter Telefolders' phone number: 

|l-1 -800-555-1212 

Enter your Telefolders account name: 

ISLENPH 

Enter your account's password: 


Dial J once now 


[ Bypass dialing 



( Dial ) until Telefolders answers, 
then flash and sound alarm 


Transmission speed: 
O 300 <§) 2400 

0 1200 Q9600 


— Close "audible" ™ 

Delete 

Send... 

Deceive 

Change password.. 
Show balance... 
Priuileges... 
Priuacy... 

Quit... 

□ _ : 

font file* &. tools _ 


: Software to make your Macintosh talk 
jjjij “MacmTalk" occupies 92983 bytes 


entertainment 


Demonstrations 


demonstrations 



audible HI 

- c 

M 

Vave Makar 

Melody 

MacinT afc 

i 

<t tt> 

r.M 


Bop 

Sound 

Sound Lab 


Mac files saved on the Zebra appear as standard icons, folders, and windows. 
To copy any Mac program, data, or document from the Zebra to your 
Macintosh, just click on the icon you want and select "Receive" from the Mac's 
pull-down menu. 

Each Mac also has access to its own private folder, for sending and receiving 
electronic mail via the Zebra. 

Telefolders host software for the Zebra is $995. A starter kit of Telefolders 
software for the Macintosh is $49.95, and includes four free hours of access to 
Semaphore’s own Zebra host, which features a large collection of Macintosh 
public domain software. 

To order, or to receive more information, contact Semaphore Corporation, 

207 Granada Drive, Aptos, CA 95003, (408) 688-9200. 

__ _ Phone call 

-- — Modem »•••••£• 





Modem 


Mac 
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Questions Most Frequently Asked 

About STRIDE/Z 

1. What is STRIDE/Z? 

STRIDE/Z is an integrated package of manufacturing software for General 
Automation Zebra computers using the Pick operating system. STRIDE/Z is a 
product of Semaphore Corporation. 


2. What software is included in the STRIDE/Z package? 

STRIDE/Z includes 18 modules to automate every aspect of a 
manufacturing company: accounts payable, accounts receivable, cost 
accounting, customer service, engineering, fixed assets, general ledger, 
inspection, order entry, payroll, personnel, production control, programming, 
purchasing, receiving, shipping, shop floor, and stock room.. The production 
control module includes regenerative Materials Requirement Planning, 

STRIDE/Z consists of approximately 200 programs, 350 procs, 80 formatted 
screens, 655K bytes of online user documentation, and 225K bytes of online 


programmer cross reference documentation. The approximately 100 files in 
STRIDE/Z require 2.5 million bytes of disk space for installation. STRIDE/Z uses no 


assembler code. _ 

3. \^y is STRIDE/Z better than other manufacturing packages? _ 

STCIDE/Z works. It was developed from scratch over a two year period 
an cfffual electronics manufacturer, as Wes climbed from $10 million to o\W 


$20 million. 


STRIDE/Z has a clean, modular, well-structured, and conceptually integrated 
design. All design and implementation work was the effort of an individual 
programmer. Unlike other large software products, STRIDE/Z is not a collection 
of ad hoc patches and multiple programming styles. 

STRIDE/Z simultaneously and correctly updates multiple files as soon as 
transactions are entered, in order to provide a database that is always up to 
date, and to avoid unfriendly batch-style processing. 

STRIDE/Z is well-documented, especially for the programmer. Extensive 


cross-references carefully document all program, proc, and data 



interdependencies, so that modifications 
. are easy and predictable. 

II 1 And STRIDE/Z is inexpensive. 

4. How can I find out more about STRIDE/Z? 

Call or write Semaphore Corporation, 
207 Granada Dr., Aptos, CA 95003 
(408) 688-9200 
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Now available by popular demand! 

Our Pick Mailing List 

CREAM of the CROP 

Our 3,000 most responsive Pick users' names and addresses. 
Only $150 plus tax for one-up adhesive labels, sorted, printed, 
and delivered. Send no payment without first obtaining our 
order form and one-time use agreement. 

P Mail by Marianne • 1893 Nadina St. • Seaside CA 93955 


PRINT TITLE:" = 

PRINT STACK<STACKED> 

RETURN 

STACKED counts the number of 
“operands” in the STACK variable. The 
show.f unc routine uses a subordinate 
get.operand routine to repeatedly 
retrieve semicolon-delimited operands 
and operators out of the F-conversion 
and save them in the variable named 
OPERAND. Operands like numeric 
attribute numbers indicate values to 
stack, while operators like + or * or 
(MD2 ) operate on values in the STACK. 


Semaphore Corporation welcomes 
its newest B-TREE-P customers: 

Tricor America Inc. 
Mathis and Associates Inc. 

Arrowhead Water Co. 
Advanced Technology Labs 


WANTED 

USED MICRODATA 
SEQUEL 

Please send price and 
configuration to: 

METRO SALES, INC. 
1620 E 78TH STREET 
MINNEAPOLIS MN 55423 
ATTN: SANDY WALLACE 


GA 

ZEBRA 

1750 

with 

47 MEG 
HARD DISK 

1 MEG MEMORY 
12 I/O PORTS 

FACTORY REFURBISHED 

BARGAIN AT $8955 

CALL 
URSULA 
(805) 963-2021 



Ujilock the Secreis 
in Your Computer! 


Pragma (not to be 
confused with 
Pragma’s Product 
Profiles) is the 
original 48-page 
technical journal for 
Pick users published 
quarterly beginning 
in August 1982. 
Each issue is packed 
with software and 
helpful information, 
including complete 
and debugged 
program listings and 
detailed, explanatory 
articles for readers at 
all levels of 
experience. Order 
your Pragma issues 
today and begin 
unlocking the secrets 
in your Pick system! 

Send $25 for 
each 48-page 
hack issue to: 
Pragma, 207 
Granada Dr., 
Aptos, CA 
95003 
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Once the end of the F-conversion is reached, the result 
remaining in the STACK is output. 

The get.operand subroutine can use a get .chr 
subroutine to get the next F-conversion character into 
the variable CHR, and gradually accumulate OPERAND. 
Finding a left parenthesis indicates the start of a 
conversion code operator, a digit indicates the start of a 
numeric operand, otherwise a single-character operator 
like * or + is assumed. For example, 

get.operand: OPERAND="" 

GOSUB get. chr 
BEGIN CASE 
CASE CHR = " (" 

LOOP 

GOSUB get.chr 
UNTIL CHR = ")" DO 
OPERAND = OPERAND : CHR 
REPEAT 

GOSUB get.chr ;* Ignore 
CASE CHR MATCHES "IN" 

LOOP 


OPERAND = OPERAND : CHR 
GOSUB get.chr 
UNTIL CHR = DO REPEAT 
CASE 1 ; * Assume single char operator 
OPERAND = CHR 
GOSUB get. chr ;* Ignore 
END CASE 
RETURN 

The get.chr subroutine simply picks up the next 
character from the F-conversion at the current column, 
with the statements 

get.chr: CHR=CONV[COL,1} 

COL=COL+l ; RETURN 

Now INPUT can handle the REMIT dictionary 
definition, and the command 

INPUT INVOICE SUBTOTAL TAX REMIT 

generates the dialog 


Edit what id?l 
Old SUBTOTAL =6.00 
New SUBTOTAL? 5 
Old TAX = 1.00 
New TAX?2 
TOTAL =7.00 
File or EXit?FI 
1 filed. 

Note that the INPUT program only begins to 
explore all of the cases a truly complete input processor 
should be able to handle. INPUT should allow 
multivalued conversions, and more conversion types, 
and correctly detect and avoid the conversions it can’t 
handle. More F-conversion operators and multivalued 
operands should be allowed. However, the structure of 
INPUT is very straightforward, so a programmer should 
have an easy time adding those features. And by adding 
extensions like justified, length-tested fields at 
dictionary-defined row and column positions, INPUT 
can be made into a tool complete enough to be a true 
complement to the LIST verb. 


Pick-it-by-phone! 


DEVELOPMENT - 

LIST 

OUR 

YOU 

TOOLS 

_i 

PRICE 

PRICE 

SAVE 


ScreenGen. TheujTfeatured data entry processor. 
Minis.1950.00 1820.00 130.00 

386 .isso.w Tieroo* eaar 

286 ..^^....750.00 700.00 50.00 

FormsGen. Re^^Jlanguage & formatted output. 

Minis. 850.00 794.00 56.00 

386 . 550.00 514.00 36.00 

286 .350.00 327.00 23.00 

Genesys. The program generator that produces 
structured, ready to run Pick/BASIC source code. 

Minis.2995.00 2645.00 350.00 

PCs.1995.00 1762.00 233.00 

Programmer's Helper 

PCs.795.00 530.00 265.00 

Minis.995.00 664.00 331.00 

SuperScreen+FlexiForm+ReportMaster 

Up to 10 ports.695.00 595.00 100.00 


PICK 0 S 

LIST 

OUR 

YOU 

FOR PCS 

PRICE 

PRICE 

SAVE 

3 user AT.. 

.795.00 

742.00 

53.00 

6 user AT. 

.995.00 

929.00 

66.00 

10 user AT. 

.1295.00 

1209.00 

86.00 

10 user 386 . 

.1495.00 

1396.00 

99.00 

17 user 386 . 2195:00 2049.00 146.00 


LIST 

OUR 

YOU 

B-TREES 

PRICE 

PRICE 

SAVE 


1 MORE 

LIST 

OUR 

YOU 

| SOFTWARE 

PRICE 

PRICE 

SAVE 


hr. Output quality barcodes on your printer. 

.0.00 165.00 

9.00 66.00 


B-TREE-P. Our favorite B-tree package. Includes all 
source code and special bimonthly newsletter. 
Semaphore exclusive .... 395.00 

Smart-tree. Assembly language B-tree software. 

ATs.250.00 217.00 33.00 

XTs.200.00 174.00 26.00 


LEARNING 

LIST 

OUR 

YOU 

SYSTEMS 

PRICE 

PRICE 

SAVE 


Prof. The electronic learning system for Pick. 

‘15.r . 


Minis.695.00 

PCs.395.00 


580.00 

330.00 


115.00 

65,00 


. 

PCs 

.995.00 

375 00 

Full-view. Windowing software fc 
Alik..500.00 

. 

.400.00 

w 

GFE Eliminator... 

.395.00 

Electronic mail... 

.199.00 

CompuSheeU. 

.795.00 

1 COMPUTERS 

LIST 

PRICE 

Wyse PC compatibles. 

20MB PC+.1899.00 

20MB 286. 

.2099.00 

40MB 386. 

.4999.00 


QIK-Mag 1/2” tape interface for PCs. 

lOMhzorless.1495.00 1413.00 

10-12Mhz.1795.00 1695.00 _ 

with tape drive.6395.00 6014.00 twr.OO 




434.00 66.00 

347.00 53.00 

355.50 39.50 

173.00 26.00 

742.00 53.00 


196.00 

220.00 

564.00 


LIST OUR YOU 

TERMINALS PRICE PRICE S«VE 


Wyse CRTs. 

Model 30 . 399.00 

Model 50 .499.00 

Model 60 .599.00 

Model 75 .795.00 

Model 85 .599.00 

Model 99 .649.00 

Color CRT.999.00 


W 

49.00 

71.00 

85.00 

58.00 

65.00 


359.00 
450.00 
528.00 
710.00 
541.00 
584.00 
899.00 100.00 


DATA 

LIST 

OUR 

YOU 

TRANSFER 

PRICE 

PRICE 

SAVE 


Export. Upload and download data to and from Pick, 
Revelation, and other systems. 

Pick.500.00 475.00 25.00 

Revelation.250.00 237.50 12.50 

PK Harmony. Terminal emulation with Pick-to-PC 
and back data transfer and reformatting. 

All CPUs.595.00 527.00 68.00 


CS+ tutorial. Interactive self-study teaching system. 

Minis.395.00 344.00 51.00 

PCs.295.00 257.00 38.00 

Pick Made Easy. Self-study course for newcomers. 
PCs.149.00 123.00 26.00 

Word processing tutorial. 

Minis.395.00 344.00 51.00 

PCs.295.00 257.00 38.00 

CR Teacher. The authoring system for Pick. Create 
interactive training systems for your own applications. 

Minis.1495.00 1330.00 165.00 

PCs.995.00 864.00 131.00 


1 PRINTERS 

LIST 

PRICE 

OUR 

PRICE 

YOU 1 
SAVEI 

C. Itoh ProWriter printers 

160 chars/sec. 

180 chars/sec. 

369.00 

639.00 

335.02 

587.68 

33.98 

51.32 


300 chars/sec.699.00 636.77 

570 chars/sec.1995.00 1815.05 

Texas Instruments OmniLaser printer. 
15pages/min.5995.00 5329.00 


62.23 

179.95 


666.00 


MORE 

LIST 

OUR 

YOU 

HARDWARE 

PRICE 

PRICE 

SAVE 

Priam internal disk drives for PCs and compatibles. 

40MB. 

.1085.00 

947.00 

138.00 

45MB 1/2 hgt. 

.1085.00 

927.00 

158.00 

60MB. 

.1345.00 

1159.00 

186.00 

130MB. 

.3100.00 

2710.00 

390.00 

ElectroGuard uninterruptible power supply 


250VA . 

.495.00 

439.00 

56.00 


LIST 

OUR 

YOU 

BOOKS 

PRICE 

PRICE 

SAVE 


TAPE 

LIST 

OUR 

YOU 

CONTROLLERS 

PRICE 

PRICE 

SAVE 


9track, the 1/2" tape controller. 
PCs.1195.00 


Pick, A Practical Guide.29.95 27.95 2.00 

Pick for Users.19.95 18.62 1.33 

Exploring the Pick O/S.29.95 27.95 2.00 

Revelation Revealed.45.00 30.00 15.00 

Pick Basic: A Guide.29.95 25.36 4.59 

Working with Pick.19.95 18.29 1.66 

Pick: Your System.24.95 23.29 1.66 


1075.50 119.50 


408 - 688-9200 

Semaphore Corporation, 207 Granada Drive, Aptos, CA 95003 
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New B-TREE-P installations 
are sprouting up every day! 



B-TREE-P is software 
that allows your data to 
be instantly located and 
output , without having 
to wait for lengthy file 
sorts or searches. Join 
the growing number of 
sites discovering the 
power and flexibility of 
B-TREE-P. Write or 
call Semaphore Corp., 
207 Granada Drive, 
Aptos, CA 95003, 

(408) 688-9200. 



Long Beach Community Services • Haiprin Supply Co. • Casualty UnderwmefsTnET* University of 
Cali^ma • Distributed Logic Corp. • Jet Electroni^& Technology Inc. • NCAR • Trudell Trailer s£»s Inc. • 
Stewart Co. • Computyme • Data Operating Systems Inc. • Tel-A-Train Inc. • Information Technology 
Consultants • Life & Health Insurance Co. of America • Flynt Systems Corp. • System Works Inc. • Miami 
Trading Enterprises • Generation Research • Multisystems Inc. • Infocel • Cooke Data Systems Inc. • John 
Klein & Assoc. Inc, • Condominium Insurance • Penn Independent Assoc. Inc. • Mark Card • Chandler 
Lumber Co. • Eye Care & Surgery Center • Chicago Kenworth • Wofford College • Conston Inc. • 
Assertive Systems • Office Works • Cornell University • City of Irvine • Excalibur Computer Systems Inc. • 
ADDS Inc. • Specs Music • Specialty Underwriters Inc. • Shoob Photography • May Trucking • Sierra 
Software Inc. • Medical Accounting Systems • AIPAC • NORPAC • Martin Cadillac Co. Inc. • Capital 
Software Ltd. • Oman Publishing • Reinsurance Assoc. • Hubert Distributing Co. • Livermore Police Dept. • 
Creative Computer Services • San Mateo County • Berelson Co. • Minnesota Trade Office • XScribe Corp. 
• Glastron-Conroy Ltd. • Opportunities Unlimited • Topsy’s International Inc. • ACS Systems Inc. • Bronson 
& Bratton Inc. • Access Software Inc. • Pactel Paging • United Collection Bureau Inc. • Laub Group Inc. • 
Associated Students UCLA • Brooks Equipment Co. Inc. • Anthony Pools • Samuelson Assoc. Co. • 
Educators Mutual Insurance • Magic Chef Air Conditioning Co. • Crosstern Corp. • Spectradyne Inc. • 
Tampa Bay Mgmt. Services Inc. • Northwest Agricultural Coop Assoc. • Century Publishing Co. • J & L 
Industrial Supply Co. Inc. • Vitek Systems Inc. • M. Epstein Inc. • Partners National Health Plans • Lilyblad 
Petroleum • Target Supply • Aerojet General • Systems Support Services • Moore Industries • Wavetek • 
Unison Technologies Inc. • Meditech • Call U.S. Inc. • Smithsonian Institution • Zircon Co. Inc. • Tennessee 
Mat Co. • Kreepy Krauly USA • Electronic Business • Butterfields • Monterey County • Compu Components 
• Victory Express Inc. • Toyota of Irving • Elliott-Pope School • Ultimate Corp. • Computerized Data • 
Rollings Homes Inc. • Kripalu Center • Premisys • Augmented Computer Technology • Marion County 
Republicans • Colonial Pacific Leasing • Brown & Caldwell Labs • Bottom Line Software Inc. • Vancouver 

Sanitary Service • Systems House Inc. 


